home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ahoy 1985 February
/
Ahoy_Magazine_85-02_1985_Double_L.d64
/
sprite sample
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
655b
|
32 lines
44 rem
45 rem..add these lines to
46 rem.. 'sprite controller'
47 rem
49 rem=-=-=-=-=-=-=-=-=-=
50 rem= sprite sampler =
51 rem=-=-=-=-=-=-=-=-=-=
55 rem=
60 rem= use sprite loader
65 rem=or sprite maker/saver
70 rem= to put sprite data
80 rem= into memory first
85 rem
90 rem=set multi-color colors:
100 c1=15:c2=14:gosub 1700
110 for sn=0 to 2
120 read bk,cc,xx,yy
130 gosub 500 :rem=set ptr
140 gosub 800 :rem=set color
150 gosub 600 :rem=set x coord
160 gosub 700 :rem=set y coord
170 gosub 1100:rem=expand x
180 gosub 1300:rem=expand y
190 gosub 1500:rem=multi-color
200 gosub 1800:rem=clr collision
210 gosub 2100:rem=set priority
220 gosub 900 :rem=turn it on
230 next sn
240 data 192,0,50,50
250 data 193,1,100,100
260 data 194,2,200,200